home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1999 March / EnigmA AMIGA RUN 35 (1999)(G.R. Edizioni)(IT)[!][issue 1999-03].iso / earcd / devel / vbcc-68k-src / machines / amiga68k / libsrc / amigalib / newlist.c < prev    next >
C/C++ Source or Header  |  1999-01-01  |  297b  |  14 lines
  1. #include <exec/lists.h>
  2. #include <clib/alib_protos.h>
  3.  
  4. void NewList(struct List *list)
  5. {
  6.    LONG *p;
  7.  
  8.    list->lh_TailPred=(struct Node*)list;
  9. /*   ((LONG *)list)++; ...ts, ts, ts... */
  10.     list=(struct List *)((char *)list+sizeof(LONG));
  11.    *(LONG *)list=0;
  12.    p=(LONG *)list; *--p=(LONG)list;
  13. }
  14.